home *** CD-ROM | disk | FTP | other *** search
/ BBS in a Box 5 / BBS in a Box -Volume V (BBS in a Box) (April 1992).iso / AMUG Info / Preferred / TF Macro Tool / Connect next >
Text File  |  1990-05-20  |  408b  |  48 lines
  1. BAUD 2400;
  2. resetBd:
  3. SLOW 4;
  4. TYPE "AT^M"
  5. PROMPSEC 4;
  6. PROMPT "OK"
  7. FALSE "resetBd"
  8.  
  9. reset:
  10. TYPE "AT^M"
  11. PROMPSEC 4;
  12. PROMPT "OK"
  13. FALSE "reset"
  14.  
  15. ReDial:
  16. TYPE "ATM1^M"
  17. PROMPT "OK"
  18.  
  19. TYPE "ATDT730-5785^M"
  20.  
  21. PAUSE 2;
  22.  
  23. PROMPSEC 45;
  24.  
  25. GETLINE "^M"
  26. FALSE "theEnd"
  27.  
  28. GETLINE "^M"
  29. FALSE "theEnd"
  30.  
  31. CMPLINE "CONNECT"
  32. TRUE "setConnect"
  33.  
  34. CMPLINE "BUSY"
  35. TRUE "resetBd"
  36. GOTO "theEnd"
  37.  
  38. setConnect:
  39. CONNECT 1;
  40. END
  41.  
  42. theEnd:
  43. CANCEL
  44.  
  45.  
  46.  
  47.  
  48.